ＩＮＶＡＤＥＲ　ＧＡＭＥ ――――――――――――――――――――――――――――――――――――――― Ｏｈ！ｍｚ　１９８７年　４月号掲載 Ｓ−ＯＳ　ＳＷＯＲＤ マシン語　ＩＮＶＡＤＥＲ　ＧＡＭＥ．ＳＯＳ 　　　　　　０３０００Ｈ−０４３０ＢＨ　Ｓ：０３０００Ｈ ソース　　ＩＮＶＡＤＥＲ１．ＡＳＣ 　　　　　ＩＮＶＡＤＥＲ２．ＡＳＣ 起動方法 ＩＮＶＡＤＥＲ　ＧＡＭＥ．ＳＯＳをロード Ｊ３０００ ――――――――――――――――――――――――――――――――――――――― その昔、パソコンやゲームセンターを賑わした インベーダーゲームがＳ−ＯＳ用として復活しました。 ゲームはもちろん、デモ画面の楽しさもまた格別。 まさにＳ−ＯＳ用アクションゲームの第１弾に ふさわしいプログラムといえるでしょう。 ・――――――― ｜■　　　　　　　　　　　　　　　　｜ ｜　　　懐かしのインベーダー　　　　｜ ｜　　　　　　　　　　　　　　　　■｜ 　　　　　　　　　　――――――――・ １月号のＳＥＮＴＩＮＥＬで予告した インベーダーゲームが完成しましたので、発表します。 １月号で書いたように、これはＢＥＭＳ用のゲームではありません。 Ｓ−ＯＳのサブルーチンだけでもこれだけのことができるんだ、 というところをじっくり味わってください。 Ｓ−ＯＳ用なので各機種に依存するグラフィックキャラクタは 使用していません、 というか、使用できませんでした。 しかし、ゲームの雰囲気は十二分にお伝えすることができると思います。 また、デモにも凝ってみましたので、 錯綜するドットにあふれた最近のゲームのデモに食傷気味の皆さん、 シンプルなキャラクタが必死に演じるこのデモをお楽しみください。 ・――――――― ｜■　　　　　　　　　　　　　　　　｜ ｜　　　　　　　遊び方　　　　　　　｜ ｜　　　　　　　　　　　　　　　　■｜ 　　　　　　　　　　――――――――・ プログラムをロードしたら、 Ｓ−ＯＳのモニタから＃Ｊ3000とすると、 デモが始まります。 得点や操作についての説明も出ますのでよく見ておいてください。 特に左右移動はＫ、Ｌキーですのでおまちがえなく。 デモにも見飽きたらスペースキーを少し長めに押してください。 お馴染みのゲームがスタートします。 左右に動きながらだんだん下に迫ってくる敵を、 ひたすら撃ち落としてください。 ときどきＵＦＯ（敵の母艦？）が画面上部を横切るので、 そいつも狙ってください。 自機は最初３機あり、1500点で１upします。 ずいぶん低いなと思われる方がいらっしやるかもしれませんが、 まあプレイしてみてください。 1500点取るのもかなりたいへんなのがわかると思います。 最近のゲームはとかく点数がインフレ気味で 100万点 ボーナスなんてのもありますが、 コツコツ地味にポイントを稼ぐのも たまにはいいのではないでしょうか （陰の声：昔のゲームはみんなそうだった……）。 さて、話が横にそれかけましたが自機の操作は、 Ｋキーで左、Ｌキーで右、 スペースキーでビーム発射となっています。 このビームは１発ずっしか撃てません。 その代わり、スペースキーをずっと押していれば 前のビームが消えるとすぐに次のビームが発射されます。 敵のビームはこちらのビームが当たっても、 互いにすり抜けてしまいます。 逃げるしかありません。 また、障害物は自機あるいは敵のビームが ８発当たると少しずつ消えていきます。 動いている敵を全部倒すと１面クリアです。 自機が全部やられるか、 敵が自機と同じところまで降りてきてしまうと ゲームオーバーです。 なお、ゲーム中にシフト＋ブレイクキーを押すと Ｓ−ＯＳのモニタに戻ります。 このプログラムは全機種共通で走りますが、 ＭＺ−2500を使用している方は以下の点に注意してください。 １）スクロールモードを25行に変更 ２）文字のフォントは８×８のものを使用すること 具体的な方法は1986年８月号を参照してください。 ・――――――― ｜■　　　　　　　　　　　　　　　　｜ ｜　　　　　　入力方法　　　　　　　｜ ｜　　　　　　　　　　　　　　　　■｜ 　　　　　　　　　　――――――――・ ダンプリスト（3000Ｈ〜430BＨ）を ＭＡＣＩＮＴＯ−Ｃ（B000Ｈからのもの）などで打ち込んでいきます。 入カミスがないかどうかチェックサムなどでよく確認してから、 スタートアドレス3000Ｈでセーブしてください。 各機種のモニタを使用する場合は、マニュアルをよく読んで、 操作ミスのないようにしましょう。 いずれの場合でもこのプログラムを実行する際には、 Ｓ−ＯＳ“ＳＷＯＲＤ”が必要です。 ソースリストはメインとデモの部分が別別になっています。 しかし、注意していただきたいのは これは分割アセンブルするのではない、 ということです。 したがって、改造前のＺＥＤＡでもアセンブル可能です。 具体的には、まず、メインのソースを読み込んでアセンブルし、 次に、テキストをクリアして （改造版ＺＥＤＡではさらにＡ０を実行して）、 デモのソースを読み込んでアセンブルします。 そして、オブジェクトをオフセット付きでセーブします。 詳しくは、ＺＥＤＡの各掲載記事を参照してください。 なお、ＭＺ−80Ｋ／Ｃ／1200／ 700／1500をお使いの方は、 このままではメモリ不足のためにアセンブルできません。 そこでソースリストの不要なスペースやコメントを削除して、 オブジェクトの格納アドレスを変更するなどの処置が必要です。 ソースリストを見るとわかるように、 本プログラムではデモの部分がかなり大きくなっています。 入力するのが面倒だという方は、 3000Ｈ〜38FFＨを打ち込んだあと、 3003Ｈからの３バイトを00Ｈに変更してください、 そして上記の範囲をセーブすればＯＫです。 実行させると、すぐにゲームが始まる点を除けば、 変更前と変わりはありません。 ・―――――――――――――――――――――――――――・ ｜ここでＭＺ−80Ｂ／2000／2200用“ＳＷＯＲＤ”の　　　　｜ ｜デバッグ情報です。　　　　　　　　　　　　　　　　　　｜ ｜これらの機種ではキー入力時に　　　　　　　　　　　　　｜ ｜カーソルキャラクタが正常に取り込めませんでした。　　　｜ ｜３月号で発表したダンプリストに　　　　　　　　　　　　｜ ｜以下のような修正を加えてください。　　　　　　　　　　｜ ｜　　1B61Ｈ　　20Ｈ　→　1EＨ　　　　　　　　　　　　　｜ ｜この修正を行わないと　　　　　　　　　　　　　　　　　｜ ｜今回のＩＮＶＡＤＥＲ　ＧＡＭＥは　　　　　　　　　　　｜ ｜正常に動作しないので注意してください。　　　　　　　　｜ ・―――――――――――――――――――――――――――・ ・――――――― ｜■　　　　　　　　　　　　　　　　｜ ｜　　　　　プログラム解説　　　　　｜ ｜　　　　　　　　　　　　　　　　■｜ 　　　　　　　　　　――――――――・ それではデモ画面のハイライトシーンを中心に見ていきましょう。 まずは、ゲーム開始直後のタイトル文字が どわーっと集まってくる場面から。 一見、ものすごく複雑なことをやっているようにも見えますが、 アルゴリズムは簡単です。 まずタイトル文字のそれぞれを縦横の線で４分割します。 そして、たとえば右上部分だけの画面、左下だけの部分というように 画面を４つのブロックに分解し、 それぞれのブロックを画面の外側から所定の位置まで 斜めにズリズリ引きずっているだけなのです。 次に「Ｓ−ＯＳ」の文字が 画面にポツポツと浮かび上がってくるシーンですが、 まず画面を構成するデータを１キャラクタごとに分解し、 それぞれＸ、Ｙ座標とキャラクタコードの３バイトのデータに展開して ＴＴＬＳＯＳのワークェリアに格納します。 それを乱数を使ってシャッフルし、 あとはそのワークエリアのデータを順番に表示すればよいのです。 どちらもタネをあかせば単純なルーチンですが、 なかなか劇的な効果があると思いませんか？ ワークエリアの一覧表を表１に示しておきます。 ソースリストは楽しく読めるように配慮していますので、 そのほかのルーチンについては皆さんで解析してみてください。 表１　ワークエリアの使用状況 ・―――――――――――――――――――――――――――――――――――――・ ｜■■■■■■■■■■■■■１面ごとに設定するもの■■■■■■■■■■■■■｜ ｜ ｜ ｜ +0+1+2+3+4+5+6+7+8+9+A 初期値 ｜ ｜INVTBL:5000H □□□□□□□□□□□ 〔１〕 ｜ ｜ 5010H □□□□□□□□□□□ ｜ ｜ 5020H □□□□□□□□□□□ ｜ ｜ 5030H □□□□□□□□□□□ ｜ ｜ 5040H □□□□□□□□□□□ ｜ ｜ ｜ ｜ +0+1+2+3+4+5+6+7+8+9+A+B ｜ ｜SHLTBL:5050H □□□□□□□□□□□□ 〔８〕 ｜ ｜ 5060H □□□□□□□□□□□□ ｜ ｜ ｜ ｜LEDGE: 5070H 最左端に存在するｲﾝﾍﾞｰﾀﾞｰの列 〔０〕 ｜ ｜REDGE: 5071H 最右端に存在するｲﾝﾍﾞｰﾀﾞｰの列 〔10〕 ｜ ｜DEDGE: 5072H 最下端に存在するｲﾝﾍﾞｰﾀﾞｰの段 〔４〕 ｜ ｜ ｜ ｜MOVDRC:5073H ｲﾝﾍﾞｰﾀﾞｰの動く方向 〔１〕 ｜ ｜ ０……左 １……右 ２，３……下 ｜ ｜ ｜ ｜LIVINV:5074H 生き残っているｲﾝﾍﾞｰﾀﾞｰの数 〔55〕 ｜ ｜WAITCH:5075H ウェイトカウンタの値 〔20H 〕 ｜ ｜NOWCNT:5076H 今のカウンタの値 〔20H 〕 ｜ ｜ ｜ ｜MSHIPX:5077H 自機のＸ座標 〔１〕 ｜ ｜MSHIPY:5078H 自機のＹ座標 〔24〕 ｜ ｜ ｜ ｜MBEAMX:5079H 自分のビームのＸ座標 〔０〕 ｜ ｜MBEAMY:507AH 自分のビームのＹ座標 〔0FFH〕 ｜ ｜ ｜ ｜BEAMWK:507BH(６) ｲﾝﾍﾞｰﾀﾞｰの落とすﾋﾞｰﾑのワーク 〔0,0FFH〕*3 ｜ ｜ ｜ ｜UFOX :5071H ＵＦＯのＸ座標 〔０〕 ｜ ｜UFOY :5072H ＵＦＯのＹ座標 〔０〕 ｜ ｜ ｜ ｜UFODRC:5083H ＵＦＯの進む方向 〔０〕 ｜ ｜ ０………左 １………右 ｜ ｜ ｜ ｜UFDICT:5084H ＵＦＯが撃墜されてからのｶｳﾝﾄ 〔０〕 ｜ ｜UFOCNT:5085H(２) 前のＵＦＯが飛んでからのｶｳﾝﾄ 〔FFFFH 〕 ｜ ｜ ｜ ｜CNT01 :5087H ０と1の値を刻む 〔０〕 ｜ ｜ ｜ ｜TPINVX:5088H 左上端のｲﾝﾍﾞｰﾀﾞｰのＸ座標 〔１〕 ｜ ｜TPINVY:5089H 左上端のｲﾝﾍﾞｰﾀﾞｰのＹ座標 〔(面数mod10)+1〕 ｜ ｜SCINEN:508AH 現在の面数 〔(+1)〕 ｜ ｜ ｜ ｜■■■■■■■■■■■■ゲームごとに設定するもの■■■■■■■■■■■■■｜ ｜SCINEN:508AH 現在の面数 〔０〕 ｜ ｜LFTHOU:508BH 残りの砲台の数 〔２〕 ｜ ｜ ｜ ｜SCDTFU:508CH スコアの状態を表す 〔２〕 ｜ ｜ ｜ ｜ ２……1500点以下 １……2000点以下 ０……それ以上 ｜ ｜ ｜ ｜SCRFIG:5090H 表示するスコアの桁数 〔１〕 ｜ ｜SCREWK:5091H(７) 得点のワーク（十の位〜千万の位）〔0000000〕 ｜ ｜ ｜ ｜HSCFIG:5098H 表示するハイスコアの桁数 〔４〕 ｜ ｜SCREWK:5091H(７) ﾊｲｽｺｱのﾜｰｸ（十の位〜千万の位） 〔0000000〕 ｜ ｜ ｜ ｜ ｜ ｜■■■■■■■■■■■■■■デモ用ワークエリア■■■■■■■■■■■■■■｜ ｜RDBLKX:50A0H 右下ブロックのｘ座標 〔−29〕 ｜ ｜RDBLKY:50A1H 右下ブロックのＹ座標 〔−14〕 ｜ ｜ ｜ ｜LDBLKX:50A2H 左下ブロックのＸ座標 〔８〕 ｜ ｜LDBLKY:50A3H 左下ブロックのＹ座標 〔−２〕 ｜ ｜ ｜ ｜LUBLKX:50A4H 左上ブロックのＸ座標 〔８〕 ｜ ｜LUBLKY:50A5H 左上ブロックのＹ座標 〔25〕 ｜ ｜ ｜ ｜RUBLKX:50A6H 右上ブロックのＸ座標 〔−29〕 ｜ ｜RUBLKY:50A7H 右上ブロックのＹ座標 〔37〕 ｜ ｜ ｜ ｜MTSTEP:50A8H タイトルの表示ステップ 〔19〕 ｜ ｜ ｜ ｜OFSETX:50A9H(２) 仮想画面のオフセット値 〔０〕 ｜ ｜ ｜ ｜TTLSOS:5100H(1800) タイトル（Ｓ−ＯＳ）のワーク ｜ ｜VIRSCN:5900H(1800) 仮想画面ワーク ｜ ｜ ｜ ・―――――――――――――――――――――――――――――――――――――・